; Music of Bounder (1986) (Gremlin Graphics) (C.Kerry and P.Jackson)
; Ripped by Megachur the 27/02/2009

	write "BOUNDER.BIN"

music_date_rip	equ &1b29
music_adr	equ &8707
first_theme	equ 0
last_theme	equ 0	; 0 -> 0

	read "music_header_v1_0.asm"
	
; MUSIC TYPED IN PAINSTAKINGLY BY C.KERRY AND P.JACKSON

.l8707
	push bc
	ld b,a
	ld a,c
	ld c,b
	ld b,#f4
	di
	out (c),a
	ld b,#f6
	in a,(c)
	or #c0
	out (c),a
	and #3f
	out (c),a
	ld b,#f4
	out (c),c
	ld b,#f6
	ld c,a
	or #80
	out (c),a
	out (c),c
	pop bc
	ret
.l872b
	call l8707
	ei
	ret
	ret
	ld a,(l8c03)
	or a
	ret nz
	ld (l8bfe),de
	ld a,#01
	ld (l8c03),a
	ret
	ld c,#07
	ld a,#31
	call l8707
	ld c,#06
	ld a,#1f
	call l8707
	ld c,#01
	ld a,d
	call l8707
	dec c
	ld a,e
	call l8707
	ld c,#0b
	ld a,e
	call l8707
	inc c
	ld a,d
	call l8707
	inc c
	ld a,#09
	call l8707
	ld c,#08
	ld a,#10
	call l8707
	ld c,#0e
	jp l8707
	ld a,(l8c04)
	or a
	ret nz
	ld a,r
	and #1f
	ld (l8c02),a
	ld a,#01
	ld (l8c04),a
	ret
	ld a,(l8c05)
	or a
	ret nz
	ld de,#042e
	ld (l8c00),de
	ld a,#01
	ld (l8c05),a
	ret
	ld a,(l8c05)
	cp #02
	ret nc
	xor a
	ld (l8c05),a
	ld de,#0257
	ld (l8c00),de
	ld a,#02
	ld (l8c05),a
	ret
	ret
	add #05
	add a
	ld d,#00
	ld e,a
	ld c,#07
	ld a,#38
	call l8707
	ld c,#01
	ld a,d
	call l8707
	ld h,e
	dec c
	ld a,e
	call l8707
	ld c,#0b
	ld a,e
	call l8707
	inc c
	ld a,d
	call l8707
	inc c
	ld a,#09
	call l8707
	ld c,#08
	ld a,#10
	call l8707
	ld c,#0e
	jp l8707
;
.init_music
.play_music
;
.l87e8
	ld hl,(l8898)
	ld a,(l889a)
	dec a
	jr nz,l87fe
	ld a,#1a
	ld (l889c),a
	inc hl
	ld a,(hl)
	srl a
	inc hl
	ld (l8898),hl
.l87fe
	ld (l889a),a
	ld a,(hl)
	or a
	jr z,l8807
	add #0c
.l8807
	ld hl,l889e
	ld e,a
	ld d,#00
	add hl,de
	add hl,de
	ld e,(hl)
	inc hl
	ld d,(hl)
	exx
	ld hl,(l8896)
	ld a,(l889b)
	dec a
	jr nz,l8829
	ld a,#1a
	ld (l889d),a
	inc hl
	ld a,(hl)
	srl a
	inc hl
	ld (l8896),hl
.l8829
	ld (l889b),a
	ld a,(hl)
	inc a
	jr nz,l8846
	ld hl,l8ee5
	ld (l8896),hl
	ld hl,l8d35
	ld (l8898),hl
	ld a,#01
	ld (l889a),a
	ld (l889b),a
	jr l87e8
.l8846
	dec a
	jr z,l884b
	add #0c
.l884b
	ld hl,l889e
	ld d,#00
	ld e,a
	add hl,de
	add hl,de
	ld e,(hl)
	inc hl
	ld d,(hl)
	ld c,#07
	ld a,#38
	call l872b
	ld c,#04
	ld a,e
	call l872b
	inc c
	ld a,d
	call l872b
	exx
	ld c,#02
	ld a,e
	call l872b
	inc c
	ld a,d
	call l872b
	ld c,#09
	ld a,(l889c)
	dec a
	jr z,l887f
	ld (l889c),a
.l887f
	rra
	call l872b
	inc c
	ld a,(l889d)
	dec a
	jr z,l888d
	ld (l889d),a
.l888d
	rra
	call l872b
	ld c,#0e
	jp l872b
.l8896
	dw l8ee5
.l8898
	dw #8d35
.l889e equ $ + 4
.l889d equ $ + 3
.l889c equ $ + 2
.l889b equ $ + 1
.l889a
	db #01,#01,#0f,#0f,#00,#00
	dw #04fc,#04b4,#0470,#0431
	dw #03f4,#03bc,#0386,#0353
	dw #0324,#02f6,#02cc,#02a4
	dw #027e,#025a,#0238,#0218
	dw #01fa,#01de,#01c3,#01aa
	dw #0192,#017b,#0166,#0152
	dw #013f,#012d,#011c,#010c
	dw #00fd,#00ef,#00e1,#00d5
	dw #00c9,#00be,#00b3,#00a9
	dw #009f,#0096,#008e,#0086
	dw #007f,#0077,#0071,#006a
	dw #0064,#005f,#0059,#0054
	dw #0050,#004b,#0047,#0043
	dw #003f,#003c,#0038,#0035
	dw #0032,#002f,#002d,#002a
	dw #0028,#0026,#0024,#0022
;$$$ no music
	db #2a,#cf,#73,#11,#42,#c0,#06,#08
	db #ed,#53,#02,#8a,#ed,#53,#04,#8a
	db #cd,#5d,#89,#cd,#5d,#89,#cd,#5d
	db #89,#cd,#5d,#89,#cd,#5d,#89,#cd
	db #5d,#89,#cd,#5d,#89,#cd,#5d,#89
	db #cd,#5d,#89,#cd,#5d,#89,#cd,#5d
	db #89,#cd,#5d,#89,#cd,#5d,#89,#cd
	db #5d,#89,#cd,#5d,#89,#0e,#ff,#ed
	db #a0,#ed,#a0,#ed,#a0,#ed,#a0,#ed
	db #a0,#ed,#a0,#ed,#a0,#ed,#a0,#ed
	db #a0,#ed,#a0,#ed,#a0,#ed,#a0,#ed
	db #a0,#ed,#a0,#ed,#a0,#ed,#a0,#ed
	db #a0,#ed,#a0,#ed,#a0,#ed,#a0,#ed
	db #a0,#ed,#a0,#ed,#a0,#ed,#a0,#ed
	db #a0,#ed,#a0,#ed,#a0,#ed,#a0,#ed
	db #a0,#ed,#a0,#ed,#a0,#ed,#a0,#ed
	db #a0,#ed,#a0,#ed,#a0,#ed,#a0,#ed
	db #a0,#ed,#a0,#ed,#a0,#ed,#a0,#ed
	db #a0,#ed,#a0,#ed,#a0,#ed,#a0,#ed
	db #a0,#ed,#a0,#ed,#a0,#ed,#a0,#ed
	db #a0,#ed,#a0,#ed,#a0,#ed,#a0,#ed
	db #a0,#ed,#a0,#ed,#a0,#ed,#a0,#ed
	db #a0,#ed,#a0,#ed,#a0,#ed,#a0,#ed
	db #5b,#04,#8a,#7a,#c6,#08,#57,#ed
	db #53,#04,#8a,#a7,#23,#23,#23,#23
	db #cb,#ac,#fa,#5f,#89,#d9,#ed,#5b
	db #02,#8a,#21,#40,#00,#19,#22,#02
	db #8a,#22,#04,#8a,#d9,#ed,#5b,#02
	db #8a,#c9,#00,#00,#00,#00,#d5,#c5
	db #f5,#cd,#10,#8a,#f1,#c1,#d1,#c9
	db #e5,#e5,#11,#f4,#bd,#d6,#20,#6f
	db #26,#00,#29,#29,#29,#19,#eb,#e1
	db #1a,#13,#4f,#e6,#f0,#47,#0f,#0f
	db #0f,#0f,#b0,#77,#2c,#79,#ed,#6f
	db #79,#ed,#6f,#01,#ff,#07,#09,#cb
	db #7c,#20,#e5,#e1,#c9,#00,#00,#00
	db #00,#00,#00,#00,#00,#b7,#c8,#3d
	db #c3,#13,#77,#f5,#c5,#d5,#e5,#d9
	db #e5,#d5,#c5,#d9,#06,#f5,#ed,#78
	db #e6,#01,#28,#34,#32,#0d,#8c,#af
	db #32,#0e,#8c,#3a,#06,#8c,#ee,#01
	db #32,#06,#8c,#28,#12,#3a,#0e,#80
	db #3c,#e6,#0f,#32,#0e,#80,#01,#0c
	db #7f,#ed,#49,#f6,#40,#ed,#79,#01
	db #8c,#7f,#ed,#49,#cd,#e8,#87,#01
	db #01,#7f,#21,#0a,#8c,#c3,#2d,#8b
	db #32,#0d,#8c,#3a,#0e,#8c,#3c,#32
	db #0e,#8c,#fe,#04,#ca,#23,#8b,#fe
	db #01,#28,#63,#fe,#02,#28,#3f,#fe
	db #03,#c2,#78,#8b,#af,#32,#11,#8c
	db #3a,#e1,#73,#b7,#ca,#cf,#8a,#3e
	db #42,#cd,#92,#80,#c2,#78,#8b,#3e
	db #01,#32,#11,#8c,#3e,#17,#cd,#92
	db #80,#c2,#78,#8b,#c3,#d5,#73,#3e
	db #2f,#cd,#92,#80,#28,#08,#cd,#5c
	db #80,#e6,#10,#ca,#78,#8b,#3e,#01
	db #32,#12,#8c,#c3,#78,#8b,#3a,#06
	db #8c,#b7,#c2,#78,#8b,#3a,#0f,#8c
	db #b7,#c2,#78,#8b,#cd,#1c,#80,#b7
	db #ca,#78,#8b,#32,#10,#8c,#3e,#01
	db #32,#0f,#8c,#c3,#78,#8b,#3a,#06
	db #8c,#b7,#ca,#78,#8b,#3a,#0f,#8c
	db #b7,#20,#65,#cd,#5c,#80,#b7,#28
	db #5f,#32,#10,#8c,#3e,#01,#32,#0f
	db #8c,#18,#55,#01,#8d,#7f,#ed,#49
	db #0e,#01,#21,#07,#8c,#ed,#49,#7e
	db #23,#ed,#79,#0c,#cb,#51,#28,#f5
	db #3a,#0d,#8c,#b7,#20,#3a,#3a,#06
	db #8c,#b7,#28,#34,#3a,#05,#8c,#b7
	db #20,#14,#3a,#03,#8c,#b7,#20,#17
	db #3a,#04,#8c,#b7,#28,#18,#3a,#02
	db #8c,#cd,#b2,#87,#18,#10,#ed,#5b
	db #00,#8c,#cd,#b8,#87,#18,#07,#ed
	db #5b,#fe,#8b,#cd,#40,#87,#af,#32
	db #03,#8c,#32,#04,#8c,#32,#05,#8c
	db #d9,#c1,#d1,#e1,#d9,#e1,#d1,#c1
	db #f1,#fb,#c9,#11,#3f,#c6,#21,#42
	db #c6,#06,#08,#b7,#7e,#17,#77,#ed
	db #6f,#2d,#7e,#17,#77,#ed,#6f,#2d
	db #7e,#12,#17,#77,#ed,#6f,#2c,#2c
	db #7c,#c6,#08,#67,#54,#10,#e4,#21
	db #3f,#c6,#11,#2c,#08,#06,#08,#c5
	db #06,#2c,#b7,#7e,#17,#77,#ed,#6f
	db #2d,#10,#f8,#c1,#19,#10,#f0,#21
	db #fb,#8b,#35,#cc,#c7,#8b,#c9,#3e
	db #08,#32,#fb,#8b,#2a,#fc,#8b,#7e
	db #23,#22,#fc,#8b,#cb,#7f,#20,#06
	db #21,#41,#c6,#c3,#06,#8a,#af,#32
	db #fa,#8b,#c9,#21,#14,#c6,#e5,#01
	db #2e,#00,#54,#5d,#1c,#36,#00,#ed
	db #b0,#e1,#11,#00,#08,#ed,#5a,#30
	db #ed,#c9
;$$$ no music end
.l8c00 equ $ + 6
.l8bfe equ $ + 4
	db #00,#01,#00,#00,#00,#00,#00,#00
.l8c05 equ $ + 3
.l8c04 equ $ + 2
.l8c03 equ $ + 1
.l8c02
	db #00,#00,#00,#00,#00,#4b,#4c,#4a
	db #40,#4b,#5e,#00,#03,#00,#00,#00
	db #00
;$$$ no music
	db #21,#b9,#8c,#22,#d3,#73,#af,#32
	db #cd,#73,#32,#ea,#73,#3c,#32,#ec
	db #73,#32,#e8,#73,#3e,#ff,#32,#f0
	db #73,#3e,#06,#32,#ce,#73,#32,#cc
	db #73,#3e,#0b,#32,#e5,#73,#21,#02
	db #40,#22,#cf,#73,#21,#e0,#b8,#22
	db #d6,#84,#21,#c4,#09,#22,#e2,#73
	db #06,#40,#c5,#af,#32,#eb,#73,#3c
	db #32,#e4,#73,#32,#e9,#73,#cd,#42
	db #72,#c1,#10,#ee,#af,#32,#cd,#73
	db #cd,#f5,#8c,#cd,#20,#89,#21,#28
	db #90,#22,#fc,#8b,#3e,#01,#32,#fa
	db #8b,#3a,#0d,#8c,#b7,#28,#fa,#cd
	db #83,#8b,#3a,#12,#8c,#b7,#c0,#3a
	db #fa,#8b,#b7,#20,#ec,#3a,#eb,#92
	db #b7,#20,#db,#21,#9f,#8c,#22,#fc
	db #8b,#3e,#01,#32,#fa,#8b,#af,#32
	db #fa,#76,#18,#d5,#2e,#2e,#2e,#2e
	db #43,#48,#45,#41,#54,#20,#4d,#4f
	db #44,#45,#20,#4e,#4f,#57,#20,#4f
	db #4e,#2e,#2e,#2e,#2e,#ff,#0a,#0a
	db #0a,#0a,#0a,#0a,#0a,#0a,#0a,#0a
	db #0a,#0a,#0a,#0a,#0a,#0a,#0a,#0a
	db #0a,#0a,#0a,#0a,#0a,#0a,#0a,#0a
	db #0a,#0a,#0a,#0a,#0a,#0a,#0a,#0a
	db #0a,#0a,#0a,#0a,#0a,#0a,#0a,#0a
	db #0a,#0a,#0a,#0a,#0a,#0a,#0a,#0a
	db #0a,#0a,#0a,#0a,#0a,#0a,#0a,#0a
	db #0a,#0a,#21,#12,#32,#22,#97,#7a
	db #06,#07,#21,#28,#8d,#c5,#5e,#23
	db #56,#23,#e5,#d5,#d9,#d1,#d9,#cd
	db #1a,#8d,#3a,#97,#7a,#c6,#20,#32
	db #97,#7a,#e1,#c1,#10,#e7,#c9,#2a
	db #97,#7a,#7c,#dd,#67,#cd,#29,#7c
	db #3a,#98,#7a,#fd,#e9,#70,#c7,#70
	db #cf,#70,#d7,#70,#df,#70,#e7,#70
	db #ef,#70
;$$$ no music end
.l8d35
	db #f7,#c0
	db #00,#30,#19,#30,#19,#30,#19,#30
	db #19,#30,#19,#30,#19,#30,#19,#30
	db #19,#0c,#19,#0c,#1d,#0c,#16,#0c
	db #22,#18,#20,#18,#16,#0c,#19,#0c
	db #1d,#0c,#16,#0c,#22,#0c,#20,#0c
	db #14,#0c,#20,#0c,#14,#0c,#19,#0c
	db #1d,#0c,#16,#0c,#22,#18,#20,#18
	db #16,#0c,#19,#0c,#1d,#0c,#16,#0c
	db #22,#0c,#20,#0c,#14,#0c,#20,#0c
	db #14,#18,#19,#18,#1b,#18,#1c,#18
	db #1d,#0c,#16,#18,#14,#0c,#16,#18
	db #1d,#18,#1d,#18,#19,#18,#1b,#18
	db #1c,#18,#1d,#0c,#16,#18,#14,#0c
	db #16,#18,#0f,#18,#0f,#18,#19,#18
	db #1b,#18,#1c,#18,#1d,#0c,#16,#18
	db #14,#0c,#16,#18,#1d,#18,#1d,#0c
	db #1e,#0c,#20,#0c,#1e,#0c,#20,#0c
	db #1d,#0c,#19,#0c,#16,#0c,#14,#18
	db #19,#18,#16,#30,#19,#18,#19,#18
	db #1b,#18,#1c,#18,#1d,#0c,#16,#18
	db #14,#0c,#16,#18,#1d,#18,#1d,#18
	db #19,#18,#1b,#18,#1c,#18,#1d,#0c
	db #16,#18,#14,#0c,#16,#18,#0f,#18
	db #0f,#18,#19,#18,#1b,#18,#1c,#18
	db #1d,#0c,#16,#18,#14,#0c,#16,#18
	db #1d,#18,#1d,#0c,#1e,#0c,#20,#0c
	db #1e,#0c,#20,#0c,#1e,#0c,#20,#0c
	db #1e,#0c,#20,#18,#19,#18,#19,#18
	db #19,#18,#00,#0c,#16,#0c,#12,#0c
	db #0d,#0c,#16,#0c,#19,#0c,#1b,#0c
	db #19,#0c,#1b,#0c,#16,#0c,#16,#18
	db #16,#18,#16,#18,#16,#0c,#16,#0c
	db #12,#0c,#0d,#0c,#16,#0c,#19,#0c
	db #1b,#0c,#19,#0c,#1b,#0c,#14,#0c
	db #14,#18,#14,#18,#14,#18,#14,#0c
	db #16,#0c,#12,#0c,#0d,#0c,#16,#0c
	db #19,#0c,#1b,#0c,#19,#0c,#1b,#0c
	db #16,#0c,#16,#18,#16,#18,#16,#18
	db #16,#0c,#1e,#0c,#1b,#0c,#1e,#0c
	db #17,#0c,#16,#0c,#19,#0c,#1e,#0c
	db #1b,#18,#1e,#18,#1b,#30,#1e,#0c
	db #16,#0c,#12,#0c,#0d,#0c,#16,#0c
	db #19,#0c,#1b,#0c,#19,#0c,#1b,#0c
	db #16,#0c,#16,#18,#16,#18,#16,#18
	db #16,#0c,#16,#0c,#12,#0c,#0d,#0c
	db #16,#0c,#19,#0c,#1b,#0c,#19,#0c
	db #1b,#0c,#14,#0c,#14,#18,#14,#18
	db #14,#18,#14,#0c,#16,#0c,#12,#0c
	db #0d,#0c,#16,#0c,#19,#0c,#1b,#0c
	db #19,#0c,#1b,#0c,#16,#0c,#16,#18
	db #16,#18,#16,#18,#16,#0c,#1e,#0c
	db #1b,#0c,#1e,#0c,#17,#0c,#16,#0c
	db #19,#0c,#1e,#0c,#1b,#18,#1e,#18
.l8ee5 equ $ + 6
	db #1b,#60,#1e,#30,#00,#ff,#ff,#18
	db #01,#18,#0d,#18,#01,#18,#0d,#18
	db #01,#18,#0d,#18,#01,#18,#0d,#18
	db #01,#18,#0d,#18,#01,#18,#0d,#18
	db #01,#18,#0d,#18,#01,#18,#0d,#18
	db #01,#18,#0d,#18,#01,#18,#0d,#18
	db #01,#18,#0d,#18,#01,#18,#0d,#18
	db #01,#18,#0d,#18,#01,#18,#0d,#18
	db #01,#18,#0d,#18,#01,#18,#0d,#18
	db #01,#18,#0d,#18,#01,#18,#0d,#18
	db #01,#18,#0d,#18,#01,#18,#0d,#18
	db #01,#18,#0d,#18,#01,#18,#0d,#18
	db #01,#18,#0d,#18,#08,#18,#08,#18
	db #01,#18,#0d,#18,#01,#18,#0d,#18
	db #01,#18,#0d,#18,#08,#18,#08,#18
	db #01,#18,#0d,#18,#01,#18,#0d,#18
	db #01,#18,#0d,#18,#08,#18,#08,#18
	db #01,#18,#0d,#18,#01,#18,#0d,#18
	db #01,#18,#0d,#30,#01,#18,#01,#18
	db #0d,#18,#01,#18,#0d,#18,#01,#18
	db #0d,#18,#08,#18,#08,#18,#01,#18
	db #0d,#18,#01,#18,#0d,#18,#01,#18
	db #0d,#18,#08,#18,#08,#18,#01,#18
	db #0d,#18,#01,#18,#0d,#18,#01,#18
	db #0d,#18,#08,#18,#08,#0c,#08,#0c
	db #08,#0c,#08,#0c,#08,#30,#08,#60
	db #00,#18,#06,#18,#12,#60,#00,#18
	db #01,#18,#0d,#18,#06,#18,#12,#18
	db #06,#18,#12,#18,#01,#18,#0d,#18
	db #03,#18,#05,#18,#06,#18,#12,#18
	db #06,#18,#12,#18,#06,#18,#01,#18
	db #03,#18,#05,#18,#06,#18,#12,#18
	db #06,#18,#12,#18,#06,#18,#01,#18
	db #03,#18,#05,#18,#06,#18,#12,#60
	db #00,#18,#01,#18,#0d,#18,#06,#18
	db #12,#18,#06,#18,#12,#18,#01,#18
	db #0d,#18,#03,#18,#05,#18,#06,#18
	db #12,#18,#06,#18,#12,#18,#06,#18
	db #01,#18,#03,#18,#05,#18,#06,#18
	db #12,#18,#06,#18,#12,#18,#06,#18
	db #01,#18,#03,#30,#05,#30,#00,#ff
	db #ff
;
.game_name
	db "Bounder",0
.game_year
	db "1986",0
.game_publisher
	db "Gremlin Graphics",0
.music_author
	db "C.Kerry and P.Jackson",0
.music_comment
	db "MUSIC TYPED IN PAINSTAKINGLY BY C.KERRY AND P.JACKSON",0

	read "music_end_v1_0.asm"
